|
CoCreate Programmierung : makro
caballonegro am 13.09.2010 um 16:35 Uhr (0)
Hallo,ich hab Probleme ein Macro eines anderen Systems zu verstehen bzw. das in ME10-Makrosprache zu konvertierenDas Makro soll eine Evolvent zeichnenIch blick das mit dem RADian daran nicht und wie ich das mit ME10 nun mache?Meine Units sind MM und DEGCode:DEFINE Evolvente LOCAL Xlocal y LOCAL M LOCAL Z LOCAL Rw LOCAL Rb LOCAL Alpha LOCAL T LET Z 20 LET M 1 LET Alpha 20 LET Rw 10 LET T 0let x 0let y 0 READ Modul DEFAULT M M READ Zähnezahl DEFAULT Z Z LET Rw (Z*M/2) LET Rb (Rw*COS (Alpha)) CIRCLE CENTER 0, ...
| | In das Form CoCreate Programmierung wechseln |
 |
CoCreate Programmierung : makro
caballonegro am 26.11.2010 um 01:22 Uhr (0)
Hallo, erst einmal meine Entschuldigung das ich mich dazu noch nicht geäussert habe.Dann natürlich meinen Dank das du mir helfen möchtest.Ich habe heute Abend diese macro mal ausprobiert.Als Daten habe ich M3.5 und Z28 eingegeben, den Rest habe ich bestätigt.Heraus gekommen ist natürlich etwas, aber ich glaube das ist nicht so das, was wir alle erwarten würden.siehe BildWoran kann das liegen ?wenn es passen würde, wie könnte ich nun eine Sysmetrieachse dort hinein kosntruieren, so das ich die andere Zahnhä ...
| | In das Form CoCreate Programmierung wechseln |
 |
CoCreate Programmierung : makro
caballonegro am 26.11.2010 um 02:32 Uhr (0)
Habe mal ein wenig am macro modifiziertCode:DEFINE Evolvente LOCAL X LOCAL Y LOCAL M LOCAL Z LOCAL Rw LOCAL Rb LOCAL Alpha LOCAL T LOCAL C LET Z 28 LET C 0.25 LET M 3.5 LET Alpha 20 LET Rw 10 LET T 0 LET Y 0 LET Y 0 UNITS RAD READ NUMBER Modul DEFAULT M M READ NUMBER Zaehnezahl DEFAULT Z Z READ NUMBER Zahnfussfaktor DEFAULT C C LET Rw (Z*M/2) LET Rkopf (Rw+M) LET Rfuss (Rw - M - C*M) LET Rb (Rw*COS (Alpha)) CIRCLE CENTER 0,0 Rw Rkopf Rfuss END END BSPLINE REPEAT LET X (((Rb ...
| | In das Form CoCreate Programmierung wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
